source("C:/Users/chrs0003/Desktop/FOX_R/R/DataAnalysis/HRTests/init.R")

resMb <- compareHRMobile(data=mbHR, resultsPath=HR_RESULTS_PATH, writeResults=writeResults,
                         iterations=iterations, kernelPercent=kernelPercent, mcpPercent=mcpPercent, 
                        kernelh=kernelh, name="mb")